home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / game / demo / ToTDemo0.45_R5.lha / talesdemo / rexx / GenesisOffline.rexx < prev    next >
OS/2 REXX Batch file  |  2002-07-22  |  1KB  |  27 lines
  1. /******************************************************************************************************/
  2. /* Online-Script für Genesis mit Arexx                                                                */
  3. /*     © by Martin Wolf / Eternity Hard & Software                                                  */
  4. /*                                                      */
  5. /*      First Bit set: 22.10.1999                                                                     */
  6. /*      Last Bit set : 22.10.1999                                                                     */
  7. /*                                                                                                    */
  8. /*      Version 1.00 : Erste Version aus der grauen Vergangenheit                                     */
  9. /*      Version 1.01 : Undokumentierte Befehle eingebaut                                              */
  10. /*                                                                                                    */
  11. /******************************************************************************************************/
  12.  
  13.  
  14. OPTIONS RESULTS
  15.  
  16. ADDRESS COMMAND
  17.     DO UNTIL SHOW('P','GENESIS')            /* Auf Genesis warten */
  18.       SIGNAL OFF ERROR
  19.       'WaitForPort GENESIS'
  20.       SIGNAL ON ERROR
  21.     END
  22.         genesisport = GENESIS                /* ist auf jeden Fall der aktive Port */
  23.  
  24. ADDRESS (genesisport)
  25.     OFFLINE
  26.     EXIT
  27.